Top 10k strings from Lydnr (19xx)(-)(nl)[a].z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /

Back to the directory listing

   1 sla=c4-(c4-sla
   1 sa=c2-(c2-sa
   1 sa,sla-sa:
   1 s1=s1-(256
   1 s1=s1+(s1<1
   1 s1=s1+(a$="5")-(a$="t"):
   1 s1=s1+(128
   1 s0=s0-(256
   1 s0=s0+(s0<1
   1 s0=s0+(a$="4")-(a$="r"):
   1 s0=s0+(128
   1 ngde:";l;"  ";
   1 l=l+(a$="1")-(a$="q"):
   1 d2=sla-256
   1 d$(w)+q,s:
   1 b1=b1+(b1<1
   1 b1=b1+(a$="3")-(a$="e"):
   1 b0=b0+(b0<1
   1 b0=b0+(a$="2")-(a$="w"):
   1 5k.)33b^a^
   1 ,x;"Slut lydnr.:";(sla-50005
   1 ,x;"1-Stigning:";s1;"  ";
   1 ,x;"1-Bredde:";b1;"  ";
   1 ,x;"0-Stigning:";s0;"  ";
   1 ,x;"0-Bredde:";b0;"  ";
   1 ,x;"'s':SAVE";
   1 ,x;"'l':LOAD";
   1 "Start lydnr. ?"'"(0 for fra starten) ";c1:
   1 "Slut lydnr. ?"'"0 for til slut ";c3:
   1 "Optages fra ?";v:
   1 "Navn ";b$: